ONFAILURE auf
*CONTINUE gesetzt, erkennt RPGUnit die Überwachung nicht und meldet
einen Fehler.
Das Problem existiert nicht, wenn ONFAILURE auf *ABORT
gesetzt ist, welches dem Standardwert entspricht.
Monitor Block
monitor;
// calculation statements
aEqual( 'HelloWorld' : 'Hello' );
on-error;
// error handler
endmon;
callp(e) aEqual( 'HelloWorld' : 'Hello' );